home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / util / libs / ttflib.lha / ttflib / Install-ttflib < prev    next >
Encoding:
Text File  |  1998-09-21  |  1.6 KB  |  85 lines
  1. ; install ttflib package
  2.  
  3.  
  4. (if (patmatch "(68000|68010|68020)" (database "cpu"))
  5.     (abort "A 68030 or above processor is required for this version" )
  6. )
  7.  
  8. (set #lib-dest
  9.     (askdir
  10.         (prompt "Enter Drawer where ttf.library should be installed?")
  11.         (help @askdir-help)
  12.         (default "Libs:")
  13.     )
  14. )
  15.  
  16. (set #tool-def (cat @default-dest "ttftools"))
  17. (set #tool-dest
  18.     (askdir
  19.         (prompt "Enter Drawer where the ttflib tools should be installed? A new drawer will be created only if the drawer entered does not exist")
  20.         (help @askdir-help)
  21.         (default (cat @default-dest "ttftools"))
  22.         (newpath)
  23.     )
  24. )
  25.  
  26. (set #help-dest
  27.     (askdir
  28.         (prompt "Enter Drawer where the documentation should be installed?")
  29.         (help @askdir-help)
  30.         (default #tool-dest)
  31.         (newpath)
  32.     )
  33. )
  34.  
  35. (set #need-path (NOT(exists #tool-dest (noreq))))
  36.  
  37. (set @default-dest (#tool-dest))
  38.  
  39. (copylib
  40.     (prompt "Installing ttf.library")
  41.     (help @copylib-help)
  42.     (source "ttf.library")
  43.     (dest #lib-dest)
  44.     (confirm)
  45. )
  46.  
  47. (copyfiles
  48.     (prompt "Copying truetype font installer")
  49.     (help @copyfiles-help)
  50.     (source "ttfmanager")
  51.     (dest #tool-dest)
  52.     (files)
  53.     (infos)
  54.     (confirm)
  55. )
  56.  
  57. (copyfiles
  58.     (prompt "Copying optional utilites")
  59.     (help @copyfiles-help)
  60.     (source "")
  61.     (choices "ttfinstall" "ttflist" "ttfcp" "ftview")
  62.     (dest #tool-dest)
  63.     (files)
  64.     (confirm)
  65. )
  66.  
  67. (copyfiles
  68.     (prompt "Copying ttflib.guide")
  69.     (help @copyfiles-help)
  70.     (source "ttflib.guide")
  71.     (dest #help-dest)
  72.     (files)
  73.     (infos)
  74.     (confirm)
  75. )
  76.  
  77. ;(if #need-path
  78. ;  (startup "ttflib"
  79. ;    (prompt "Add path to tools in \"S:user-startup\"")
  80. ;    (help "This will add the ttflib tools to the system search path to make them more easily accessible.")
  81. ;    (command "path " #tool-dest " add\n")
  82. ;  )
  83. ;)
  84.  
  85.